﻿Public Class Name
	Inherits vCardItem

	Public Property FamilyName As String
	Public Property GivenName As String
	Public Property AdditionalNames As String
	Public Property NamePrefix As String
	Public Property NameSuffix As String

	Protected Overrides Property vProperty As String
		Get
			Return "N"
		End Get
		Set(value As String)
		End Set
	End Property

	Protected Overrides Property vParameters As System.Collections.Generic.List(Of String)
		Get
			Dim myParameters As New List(Of String)

			myParameters.Add(FamilyName)
			myParameters.Add(GivenName)
			myParameters.Add(AdditionalNames)
			myParameters.Add(NamePrefix)
			myParameters.Add(NameSuffix)

			Return myParameters
		End Get
		Set(value As System.Collections.Generic.List(Of String))
		End Set
	End Property

	Public Sub New(FamilyName As String, GivenName As String, AdditionalNames As String, NamePrefix As String, NameSuffix As String)
		Me.FamilyName = FamilyName
		Me.GivenName = GivenName
		Me.AdditionalNames = AdditionalNames
		Me.NamePrefix = NamePrefix
		Me.NameSuffix = NameSuffix
	End Sub
End Class
